00100 QQQ 00200 GLISS 0 10; 00300 P2 NUM/.3/1/.2/.3/.7/.1/1/.5/.2/.7*; 00400 P3 1 C2 C7; 00500 P4 1000; 00600 P5 F5; 00700 P6 F1; 00800 P7 1 C2 C7; 01000 P9 F6; 01100 P8 P2; 01200 END; 01300 GLISS 1 2; 01400 P3 P7/RUN;